Input the progr«m* as printed without any extra spaces, to check it 
you have entered the program correctly enter "WORDS" “LIST* "GO", the program 
should be listed out just like the listing printed here. If you want to 
shortenEmperor < 2) to a fewer number of years change the following lines 

Line 34 IF Y>9G0T0 38 to IF Y>nGOTO 38 n = years - 1 

When playing the game enter your name one letter at a time pressing 
"GO" after entering your name. 

When fWtVEST ?? BffLS/AC appears, press any key to continue. 

j 

KING < 1) 

by R M Houser (82) 

This is a one player economic game using the Keypad for input. 

As King you must make decisions on running your kingdom economically 
for a reign of ten years. You start with 108 people, 1800 acres of land and 
3080 bushels of food. Buy and sell land, feed people, and plant crops using 
food as barter. The object is to complete your reign and garner performance 
points based on how you govern your kingdom. To get maximum points you need to 
determine how much you need to feed yor people, how many bushels that are 
required to plant your land, how many acres a person can plant, and a little 
luck. 



>200 pts * Poor 
>188 pts *« Very Poor 
<188 pts ■■ Try Again 



>600 pts = Fantastic 
>500 pts * Very Good 
>480 pts « Good 
>380 pts «• Fair 

KING <1) 

by R M Houser (82) 

1 CLEAR; PRINT * KING < 1) 

BY R M HOUSER" {PRINT 

2 PRINT " ENTER YOUR FIRS 
T NAME" ; 0=0 

4 FOR Z= 1T0 10 ; B=KP 
6 IF B= 13GOTO 10 
8 TV=B;0=0+ 1 ;8<Z)=B;NEXT 
Z 

10 CLEAR 
20 GOTO 80 

30 CY= 16; PRINT F," BUSHELS 
OF FOOD"; RETURN 
40 CY=8; PR I NT A," ACRES OF 
LAND' ; RETURN 
50 PRINT " HOW?’ ;RETURN 
60 FOR E=1T0 2000 ;NEXT E ; R 
ETURN 

70 CY=-24; PRINT " 

RETURN 

80 P=100 ;F=3000 ;A=1080 ;Y=0 
; L=0 ;NT=8 ;W=0 ; K=0 ;N= 18+RND 

(3) 

90 CLEAR 

100 PRINT " KING ",;FOR Z= 

1T0 0;TV=6<Z> {NEXT Z 
110 IF Y>0GOTO 140 
120 PRINT " YOU START YOUR 
RULE WITH: 

138 GOTO 180 
148 IF Y“ 10 GOTO 178 
150 PRINT " AFTER ",01,Y," 
YEAR< S> OF RULE: 

160 GOTO 180 

170 PRINT " AT THE END OF 
YOUR REIGN: 

180 PRINT P,“ PEOPLE 
190 GOSUB 30 ; GOSUB 40 
280 IF Y 4 1 0 GOTO 288 
210 PRINT K," PEOPLE DIED" 
|PRINT ;Z«<P-38> +<Ft180> ♦< 
<At180> x 20> -( (K-10) x2) ; PR I 
NT Z," PERFORf-t^Ctf'PTS. 

250 IF Z >M M-Z 

266 PRINT * TODAY'S HIGH S 

CORE** " , #5,M 



278 PRINT " AGAIN?" ;A**KP;G 
OTO 2 

280 V= 17+RND <5> 

298 PRINT V," BHL/AC LAND 
VALUE 

388 PRINT " BUY LAND # OF 
ACRES? 

318 INPUT B 

320 IF B=eGQTQ 410 

338 L=BxV 

348 IF LCFGOTO 380 

358 IF L>FOOSUB 58 

340 GOSUB 48 ; GOSUB 78 

370 GOTO 318 

388 F-F-L ;A«-A+B 

398 G0SU8 38; GOSUB 48 

400 IF B>0GOTO 518 

418 CY=-8; PRINT ' SELL LAN 

D 8 OF ACRES? 

428 INPUT S 
430 IF S=0GOTO 510 
448 IF S<AGOTO 490 
450 IF S=APRINT " QUITTER 1 
" {GOTO 260 
440 GOSUB 50 
470 GOSUB 60 ;GOSUB 70 
480 GOTO 420 
498 A=A-S;F=F+VxS 
500 GOSUB 30 ; GOSUB 40 
518 CY=-8 ; PRINT * GIVE OUT 
FOOD 4 BUSHELS? 

520 INPUT C 
530 IF C<FGQTO 568 
540 IF OFGOSUB 50 
558 GOSUB 40 ; GOSUB 70 {GOTO 
520 

540 F=F-C; GOSUB 30 

578 CY=-8 ; PRINT " PLANT CR 

OPS? # OF ACRES? " 

588 GOTO 680 

590 GOSUB 68; GOSUB 70 

608 INPUT G;X=Gt2 

618 IF < G>A> + <X>F) +<G> 15xP 

) GOSUB 50 {GOTO 590 

420 F=F-X{ GOSUB 38 ; GOSUB 6 

8 

638 D-P-CfN 

648 IF D>8G0T0 668 



650 IF D<0D-0{U-RND ( 3) - 1 
668 W-RND (4)+l;T«HxG 
670 R-< (F+T) t 100) xRND < 7> 
488 F-F-R+T; J-RND <9> 

498 I=< (Ff250) -<D+ 1 ) ) +< (At 
P) i 18) 

780 IF I <=58G0T0 720 
710 1=50 

7 20 ps=p4* x~D+U s Y-Y* I i ; 
K-K+D; CLEAR J 

730 PRINT * KING *,{FOR Z= 
1T0 0;TV=e(Z) {NEXT Z 
748 PRINT " LAST YEAR 
750 IF D>P-4I F J45IF Y>3PR 
INT D," PEOPLE STARVED 
YOU HAVE BEEN THROWN IN PR 
ISON! " {GOTO 268 
760 IF D>0PRINT D," DEATHS 
778 IF U>0PRINT U," BIRTHS 
780 PRINT I," PEOPLE IMMI 
GRATED 

790 IF W>P-?2+Wt3PRINT " IM 
MI GRANTS EXCEED COUNTRY -ME 
N AND HAVE TAKEN OVER TH 
E COUNTRY' * {GOTO 260 
880 IF J45G0T0 850 
818 PRINT " THE PLAGUE KIL 

LED 

828 Q=( Px < 18xRND <5 >>>t1®® 
830 PRINT Q," PEOPLE 
840 P=P-0 

850 PRINT " YOUR PEOPLE HA 
RVESTED 

868 PRINT T," BUSHELS AT 
870 PRINT H," BUSHELS PER 
ACRE 

880 PRINT " RATS ATE ",*3, 

R," BUSHELS 

890 GOSUB 60 {GOTO 90 




EMPEROR < 2) 

by R M Houstr (82) 

This is a two player economic game using the keypad -for input. 

The present emperor of the Kingdom of Astro is getting along in years 
and has decided to have a contest between two of his Lords to determine who 
will be selected the next emperor. Each lord will start with 100 people, 3000 
bushels o f f ood , and 1000 acres o-f land. During a period of 10 years each lord 
must govern his allotment and at the end o-f ten years will be awarded 
performance points based on how many people, how many bushels of food, how many 
acres of land. The Lord with the most points will be selected the next emperor. 



EMPEROR (2) by R M HOUSER 



1 K= 1 ;N=0 ; 0=0 

2 CLEAR; GOTO 18 

3 PRINT " LORD ‘.-(RETURN 

4 CX=-71 ; RETURN 

5 CY=- 1 6 ; RETURN 

6 CY=-32; RETURN 

7 CX=-7 1 ; CY=-24 ; RETURN 

6 CX=-77 ; CY= 1 6 ; PRINT #5 , P 
,“ PEOPLE, NO. ’ , Q ; PRINT ♦! 

5 , F , ’ FOOD , BHLS . *,6;PRIN 
T 05, L, - LAND, ACRES ",M;R 
ETURN 

? GOSUB 6 ; PR 1 NT * HOW?” ;F 
OR A= IT 0 2000 ;NEXT A ; GOSUB 
6; PR I NT “ *; GOSUB 

6; RETURN 

10 CLEAR ; PRINT ‘ LORD 

LORD - ; GOSUB 4; GOSUB 
1 4 ; CX= 1 2 ; GOSUB 16 ; RETURN 
12 PRINT #5,V, - BHL/AC LAN 
D VALUE" ; RETURN 
14 FOR A= 1 0T 0 9+N;TV=0(A) ; 
NEXT A; RETURN 
16 FOR A=20TO 19+O;TV=0(A) 
;NEXT A; RETURN 
18 PRINT ‘ PLAYER ‘,K;PRIN 
T “ ENTER FIRST NAME 
20 FOR A=< Kx 10) TO (Kxl0) + 1 
0 ;W=KP 

22 IF W= 1 3K=K+ 1 ; I F K=2G0T0 
2 

24 IF K>2G0T0 30 
26 TV=W;IF K= 1N=N+ 1 ; 8(A) =W 
;NEXT A 

28 IF K=20=0+ 1 ; 8(A) =W; NEXT 
A 

30 CLEAR ;P=100;O=P;F=3000 
;G=F;L= 1000 ;t+=L;Y=0 ;NT=0 ; Z 
= 15+ RND ( 9) ; D=0 ; E=0 ; GOSUB 
10 

32 CY=24; GOSUB 4; PRINT ‘ S 
TART TRIAL PERIOD" ;G0T0 48 



34 IF Y> 9G0T0 38 
36 CY=24 ; GOSUB 4; PRINT ‘ AF 
TER “,#1,Y, - YEAR< S) " ; GOT 0 
40 

38 GOSUB 10 ;CY=24; GOSUB 4; 
PRINT "END TRIAL PERIOD 
40 GOSUB 8 
42 IF Y# 10 GOTO 54 
44 PRINT H5,D," DEATHS 
* ,E;B=P-58+ ( Ft99) +Lt 5-< < 
D-9) x2) 

46 C=Q-50+ ( Gt99) +Nt 5-< ( E-9 
) x 2) ; PRINT #5 , B , ‘ PERF . PT 
S. - ,C 

48 GOSUB 7; GOSUB 3; IF B>CG 
OSUB 14; GOTO 52 
50 GOSUB 16 

52 PRINT • SELECTED - ; GOSUB 
6 ; CX=-77 ; PR I NT - EMPEROR * 

; STOP 

54 V= 15+RND ( 9) ; GOSUB 12;K 
•*0 ; GOSUB 3 ; GOSUB 14 
56 GOSUB 7; PR I NT “BUY LAND 

? 

58 INPUT A ; X=A x V ; I F KGOTO 
64 

60 IF X> FGOSUB 9; GOTO 58 
62 IF X<F F=F“X ; L=L+A ; GOTO 
68 

64 IF X>G60SUB 9; GOTO 58 
66 IF X<6 G=G-X;M=M+A 
68 GOSUB 10; GOSUB 8 ; GOSUB 
1 2 ; K=K+ 1 ; I F K=1G0SUB 5 ; 60S 
UB 3; GOSUB 16; GOTO 56 
78 K=0; GOSUB 3 ; GOSUB 14 
72 GOSUB 7 ; PRINT ‘SELL LAN 
D? 

74 INPUT A;X=AxV;IF KGOTO 
80 

76 IF A>=L B=0 ;C=1 ; CLEAR ; 
GOTO 48 

78 F=F + X ; L=L — A ; GOTO 84 
80 IF A>=M c=0 ;B= 1 ; CLEAR ; 
GOTO 48 

82 G=G+X;M=M-A 



84 GOSUB 10; GOSUB 8, -GOSUB 
12;K-K+1;IF K= 1 GOSUB 5;G0S 
UB 3; GOSUB 16 (GOTO 72 
86 GOSUB 3 ; GOSUB 14;G0SUB 
7 ; PRINT ‘GIVE OUT FOOD? 

88 INPUT V ; I F V>F GOSUB 9; 
GOTO 88 

90 IF V<=F F=F-V; GOSUB 8 
92 GOSUB 5; GOSUB 3; GOSUB 1 
6 

94 GOSUB 6;CX=-77; INPUT W 
96 IF W> G GOSUB 9; GOTO 94 
98 IF W<=G G=G-W ; GOSUB 8 
108 K=l; GOSUB 5; GOSUB 3 ; GO 
SUB 14 

102 GOSUB 7 ; PRINT "PLANT C 
ROPS? 

104 IF K= 1 ; GOSUB 6; INPUT T 
;X=T -t 2 ; I F <T>L> + <X>F> ♦ <T> 1 
5xP) GOSUB 9 ; GOT 0 104 
106 IF K=2 ; GOSUB 6;INPUT U 
;X=Ut 2 ; I F < U>M) + (X>G) + < U> 1 
5xQ) GOSUB 9 ; GOT 0 106 
163 IF K=1F=F-X; GOSUB 8 
110 IF K=2G=G-X; GOSUB 8 
112 K=K+ 1 ; I F K=260SUB 5 ; GO 
SUB 3 ; GOSUB 16;G0T0 102 
114 I=P-VtZ ;B=RND <<P+28)t 
20 ) 

116 J=C-W4Z ;C=RND <<Q+20>7 
20 ) 

118 K=RND <4) ♦ 1 ;R=KxT;S=Kx 
U ; P=P- I ♦ B ; 0=Q- J+ C ;X=Rf 99x R 
ND (3 ) ;H=St?9xRND <3);F=F+ 
R-X ; G*=G+S-H ; CLEAR ; GOSUB 1 
0; GOSUB 8 

128 PRINT * HARVEST - , K," B 
HL/AC" ; I F ( P< 10) + ( Q< 10) CLE 
AR ; GOT 0 44 

122 Y=Y+ 1 ;D=D+ I ;E=E+ J ;A=KP 
; GOT 0 34 



Hints for playing K1 NG ( 1 ) and EMPEROR (2) . 

1. For the whole period of ten years the amount of food 
required by each person remains the same. It is somewhere 
above 10 bushels per person. 

2. A person can only plant so many acres. It is less than 20 
acres per person. Plant as many acres as you can. 

3. The value of land in bushels per acre changes each year. 

4. Sell land when land value is high and buy when land value 
1 s l ow . 

5. Rats eat some of the food each year. 

6. There are a random number of births each year based on the 
total population during the year . 

7. If either population becomes lower than 10, the other Lord 
wins. 

8. If you sell all of your land, you lose to the other Lord. 
?. In case of ties, the 2nd Lord wins. 

10. The highest score that l have made in Emperor is 589 
po inis. 




